SkipDeleted() --> true/false:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
RecNo() is set to a first current database record not marked as deleted.
If all database records are marked for delete it is set to Eof() and
returns false, if there is one not deleted record at least, his RecNo()
is set and returns true. The scan goes from the current record to the
end and then from begin.

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
nil

Return value:
~~~~~~~~~~~~~
true if a record was found, otherwise false


Source code is in file  OBject3.prg